function savepareto(points, filename)
%SAVEPARETO

f = fopen(filename, 'w');

if iscell(points)
  for i=1:size(points, 1)
    fprintf(f, '%f %f %f %s\n', points{i, 1:4});
  end
else
  for i=1:size(points, 1)
    fprintf(f, '%f %f %f\n', points(i, 1:3));
  end
end
